00100		CHAPTER SIX
00200	
00300		A DESCRIPTION OF THE PARANOID MODEL
00400	
00500	INITIALIZATION
00600	
00700		The first function or procedure executed is termed INITIALIZE.
00800	It checks to make sure the data-base has been read in and then sets
00900	a number of variables to their starting values. Some of these variables
01000	serve as flags or indices pointing to the topic under discussion or to the last
01100	self-topic discussed.
01200	Other variables are set by the interviewer who can choose to run
01300	a weak or strong version of the model.  If the weak version is
01400	elected, the variabbles of ANGER and FEAR can bbe set to `low` or
01500	`mild' values while MISTRUST can bbe set to `mild' or `high'.
01600	The interviewer also has the option of following the changes in
01700	these variables by setting a trace-variable to`Y'.  After each
01800	linguistic response of the model, the values of ANGER, FEAR and
01900	MISTRUST will be printed out.
02000	
02100	     After this initialization the algorithm prints out `Ready'
02200	to indicate to the interviewer he may now enter his input expression.
02300	While the variable ENDE is not true (Sylvia Weber spent a year in
02400	Germany), the algorithm continues to run.  The algorithm signs
02600	off when ENDE is set to true by detecting a farewell message in
02700	the input or when FEAR rises to an extremely high value.
02800	
02900	     The interviewer's input expression is read by a function
03000	which scans a list of characters and returns the scanned input in 
03100	the form of a list of words.  The next function sets up the type
03200	of `sentence' the input constitutes, a statement, a question or
03300	`illegal'.  If illegal characters {e.g. a number or a slash}
03400	are detected, the algorithm prints out `Bad input; try again',
03500	indicating to the interviewer that his input expression contains
03600	some unacceptable character.  A statement consists of a list of
03700	words followed by a period.  A question consists of {1} a list of
03800	words followed by a question mark, or {2} a list of words beginning
03900	with a wh-form {who, what, where, when, why} or how, or {3} a list
04000	of words beginning with an imperative verb {e.g. tell} followed by
04100	an expression lacking an actor {tell me about yourself}.  The
04200	program inserts a `Q' at the head of the list at this point.
04300	As described in_______, interrogative imperatives are treated
04400	as questions.  The sentence-type is assigned to the variable
04500	REMARK which then serves as the input argument to the functions
04600	{in order} Specialreaction, Delusionalreference, Selfreference,
04700	Flarereference, Personalrelation and Normal.  The algorithm then
04800	attempts to process the input expression in the above order.
04900	
05000	SPECIALREACTION
05100	
05200	     This procedure provides the appropriate reactions {linguistic,
05300	affective and belief} to special types of input expressions.  If
05400	the input consists simply of the letter `S' {the means by which an
05500	interviewer indicates silence} then the algorithm chooses a 
05600	linguistic response from the Silence list.
05700	
05800	     The procedure `Choose' selects the next reply from the
05900	relevant linguistic response list termed 'Replies'.  As the
06000	argument to the procedure `Choose', replies if first checked to
06100	see if it consists of an atom.  If it is not an atom then the head
06200	of the list is chosen for the response and removed from the response
06300	list {so it will not be output twice}.  Thus, in this case, where
06400	repeated silence is being detected and if there are no more responses
06500	on the `Exhaust' list {i.e. the 'Exhaust' list has no more responses}